home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 9 / The PC-SIG Library on CD ROM - Ninth Edition.iso / 1201_300 / DISK1212 / DISK1212.ZIP / CMENU2.BAT < prev    next >
DOS Batch File  |  1989-02-28  |  8KB  |  238 lines
  1. echo off
  2. cls
  3. if %1!==! goto MENU
  4. if exist %1.exe goto CHOOSER
  5. goto %1
  6. :CHRISTMAS
  7. set X1=A
  8. set X2=C
  9. goto C
  10. :NAVIDAD
  11. set X1=AN
  12. set X2=CN
  13. goto CN
  14. :A
  15. set X1=B
  16. donner 13,31
  17. blitzen  COMING UP NEXT 
  18. dasher 1
  19. donner 13,31
  20. echo  COMING UP NEXT 
  21. dasher 1
  22. donner 4,36
  23. blitzen A 5¼"
  24. donner 5,34
  25. blitzen Christmas
  26. donner 6,35
  27. blitzen Concert
  28. donner 13,31
  29. blitzen  COMING UP NEXT 
  30. dasher 2
  31. goto CAROLS
  32. :AN
  33. set X1=BN
  34. donner 13,31
  35. blitzen  PRONTO, PRONTO 
  36. dasher 1
  37. donner 13,31
  38. echo  PRONTO, PRONTO 
  39. dasher 1
  40. donner 4,36
  41. blitzen  Una 
  42. donner 5,34
  43. blitzen  Edición 
  44. donner 6,35
  45. blitzen  Basso 
  46. donner 13,31
  47. blitzen  PRONTO, PRONTO 
  48. dasher 2
  49. goto CAROLS
  50. :CAROLS
  51. x-herewe
  52. dasher 1
  53. x-3ships
  54. dasher 1
  55. x-rudolf
  56. dasher 1
  57. x-clear
  58. dasher 1
  59. x-canon
  60. dasher 1
  61. x-orient
  62. dasher 1
  63. x-torch
  64. dasher 1
  65. x-child
  66. dasher 1
  67. x-rois
  68. dasher 1
  69. x-patpan
  70. dasher 1
  71. x-handel
  72. dasher 1
  73. goto %X2%
  74. :B
  75. set X1=
  76. donner 13,4
  77. blitzen  MERRY CHRISTMAS TO ALL . . . 
  78. donner  13,44
  79. blitzen  . . . TO ALL A GOOD NIGHT ! ! ! 
  80. donner 13,4
  81. echo  MERRY CHRISTMAS TO ALL . . . 
  82. donner  13,44
  83. echo  . . . TO ALL A GOOD NIGHT ! ! ! 
  84. dasher 1
  85. donner 4,36
  86. blitzen A 5¼"
  87. donner 5,34
  88. blitzen Christmas
  89. donner 6,35
  90. blitzen Concert
  91. donner 13,4
  92. blitzen  MERRY CHRISTMAS TO ALL . . . 
  93. donner  13,44
  94. blitzen  . . . TO ALL A GOOD NIGHT ! ! ! 
  95. donner 13,4
  96. echo  MERRY CHRISTMAS TO ALL . . . 
  97. donner  13,44
  98. echo  . . . TO ALL A GOOD NIGHT ! ! ! 
  99. dasher 1
  100. donner 13,4
  101. blitzen  MERRY CHRISTMAS TO ALL . . . 
  102. donner  13,44
  103. blitzen  . . . TO ALL A GOOD NIGHT ! ! ! 
  104. donner 20,19
  105. blitzen NANCY MORAN
  106. donner 20,46
  107. blitzen  607 Park Avenue 
  108. donner 21,46
  109. blitzen  Baltimore, MD  21201 
  110. goto END
  111. :BN
  112. set X1=
  113. donner 13,4
  114. blitzen  FELICES NAVIDADES A TODOS .  
  115. donner  13,44
  116. blitzen  . . . A TODOS BUENAS NOCHES ! ! 
  117. donner 13,4
  118. echo  FELICES NAVIDADES A TODOS .  
  119. donner  13,44
  120. echo  . . . A TODOS BUENAS NOCHES ! ! 
  121. dasher 1
  122. donner 4,36
  123. blitzen  Una 
  124. donner 5,34
  125. blitzen  Edición 
  126. donner 6,35
  127. blitzen  Basso 
  128. donner 13,4
  129. blitzen  FELICES NAVIDADES A TODOS .  
  130. donner  13,44
  131. blitzen  . . . A TODOS BUENAS NOCHES ! ! 
  132. donner 13,4
  133. echo  FELICES NAVIDADES A TODOS .  
  134. donner  13,44
  135. echo  . . . A TODOS BUENAS NOCHES ! ! 
  136. dasher 1
  137. donner 13,4
  138. blitzen  FELICES NAVIDADES A TODOS .  
  139. donner  13,44
  140. blitzen  . . . A TODOS BUENAS NOCHES ! ! 
  141. donner 20,19
  142. blitzen NANCY MORAN
  143. donner 20,46
  144. blitzen  607 Park Avenue 
  145. donner 21,46
  146. blitzen  Baltimore, MD  21201 
  147. goto END
  148. :C
  149. cls
  150. echo                                     █***█                                   
  151. echo                                    ▀▀^^^▀▀                                  
  152. echo                                   ▀▀     ▀▀                                 
  153. echo   We Wish You a Merry Christmas  ▀▀       ▀▀  Rudolph the Red-Nosed Reindeer
  154. echo   It Came Upon a Midnight Clear ▀▀  A 5¼"  ▀▀  Handel's Hallelujah Chorus    
  155. echo      We Three Kings of Orient  ▀▀ Christmas ▀▀  What Child is This?          
  156. echo      Here We Come A-Caroling  ▀▀   Concert   ▀▀  I Saw Three Ships           
  157. echo               Bring a Torch  ▀▀               ▀▀  La March des Rois          
  158. echo                  Pat-A-Pan  ▀▀                 ▀▀  A Chrismas Canon         
  159. echo                            ▀▀       MERRY       ▀▀                          
  160. echo                           ▀▀                     ▀▀                         
  161. echo                          ▀▀       CHRISTMAS       ▀▀                        
  162. echo                         ▀▀                         ▀▀                       
  163. echo                        ▀▀            AND            ▀▀                      
  164. echo                       ▀▀                             ▀▀                     
  165. echo                      ▀▀         HAPPY NEW YEAR        ▀▀                    
  166. echo                     ▀▀                                 ▀▀                    
  167. echo                    ▀▀                                   ▀▀                  
  168. echo                   ▀▀                                     ▀▀                 
  169. echo                 ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀     ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀              
  170. echo                    NANCY MORAN  ▀  vol. 2  ▀  607 Park Avenue              
  171. echo                                 ▀ (c) 1988 ▀  Baltimore, MD 21201   
  172. echo                                 ▀▀▀▀▀▀▀▀▀▀▀▀                                
  173. if %X1%!==D! goto B
  174. x-wish
  175. goto %X1%
  176. :CN
  177. cls
  178. echo                                     █***█                                   
  179. echo                                    ▀▀^^^▀▀                                  
  180. echo                                   ▀▀     ▀▀                                 
  181. echo    Para tí, «A la Nanita Nana!»  ▀▀       ▀▀  Rudolph, the Red-Nosed Reindeer
  182. echo   It Came Upon a Midnight Clear ▀▀   Una   ▀▀  Handel's Hallelujah Chorus    
  183. echo      We Three Kings of Orient  ▀▀  Edición  ▀▀  What Child is This?          
  184. echo      Here We Come A-Caroling  ▀▀    Basso    ▀▀  I Saw Three Ships           
  185. echo               Bring a Torch  ▀▀               ▀▀  La March des Rois          
  186. echo                  Pat-A-Pan  ▀▀                 ▀▀  A Chrismas Canon         
  187. echo                            ▀▀       FELIZ       ▀▀                          
  188. echo                           ▀▀                     ▀▀                         
  189. echo                          ▀▀        NAVIDAD        ▀▀                        
  190. echo                         ▀▀                         ▀▀                       
  191. echo                        ▀▀             Y             ▀▀                      
  192. echo                       ▀▀                             ▀▀                     
  193. echo                      ▀▀         BUEN AÑO NUEVO        ▀▀                    
  194. echo                     ▀▀                                 ▀▀                   
  195. echo                    ▀▀                                   ▀▀                  
  196. echo                   ▀▀                                     ▀▀                 
  197. echo                 ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀     ▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀              
  198. echo                    NANCY MORAN  ▀    ₧ 2   ▀  607 Park Avenue              
  199. echo                                 ▀ (c) 1988 ▀  Baltimore, MD 21201   
  200. echo                                 ▀▀▀▀▀▀▀▀▀▀▀▀                        
  201. x-nanita
  202. goto %X1%
  203. :CHOOSER
  204. %1
  205. dasher 1
  206. if %1!==! set X1=D
  207. if %1!==! goto C
  208. shift
  209. goto CHOOSER
  210. :MENU
  211. cls
  212. echo  ┌───────────────────────────────────┬──────────────────────────────────────┐
  213. echo  │            WELCOME TO             │        BIENVENIDO AL CONCIERTO       │
  214. echo  │     CHRISTMAS CONCERT, vol. 2     │       DE LAS NAVIDADES, Parte 2      │
  215. echo  │    To hear the whole concert,     │   Para escuchar el concierto entero, │
  216. echo  │    enter:                         │   mande:                             │
  217. echo  │          CMENU2 CHRISTMAS         │            CMENU2 NAVIDAD            │
  218. echo  │ --------------------------------  │ ------------------------------------ │
  219. echo  │                                   │                                      │
  220. echo  │ Using the command CMENU2, you     │ Usando el mandato CMENU2, también    │
  221. echo  │ may also select one or more       │ se puede elegir uno o varios de los  │
  222. echo  │ of the carols from the list       │ caroles siguientes y crear un con-   │
  223. echo  │ below to create your own concert: │ cierto de si mismo:                  │
  224. echo  ├───────────────────────────────────┴──────────────────────────────────────┤
  225. echo  │ X-HEREWE  Here We Come a Caroling         X-3SHIPS  I Saw Three Ships    │
  226. echo  │ X-CHILD   What Child is This?             X-TORCH   Bring A Torch        │
  227. echo  │ X-HANDEL  Handel's Hallelujah Chorus      X-PATPAN  Pat-A-Pan            │
  228. echo  │ X-RUDOLF  Rudolph, the Red-Nosed Reindeer X-CANON   A Christmas Canon    │
  229. echo  │ X-ORIENT  We Three Kings of Orient Are    X-ROIS    La March des Rois    │
  230. echo  │ X-CLEAR   It Came Upon a Midnight Clear   X-NANITA  A La Nanita Nana     │
  231. echo  │ X-WISH    We Wish You a Merry Christmas                                  │
  232. echo  └──────────────────────────────────────────────────────────────────────────┘
  233. echo    EXAMPLE/EJEMPLO:     CMENU2 x-canon x-rudolf x-child x-clear ...
  234. echo   
  235. :END
  236. SET X1=
  237. SET X2=
  238.